﻿Public Class DatHangBL
    Dim dhDA As New DatHangDA

    Public Function InPhieuDH(ByVal dh As DatHangDT)
        Return dhDA.InPhieuDH(dh)
    End Function

    Public Function UpTongTien(ByVal dh As DatHangDT)
        Return dhDA.UpTongTien(dh)
    End Function

    Public Function UpNgayHenGiao(ByVal dh As DatHangDT)
        Return dhDA.UpNgayHenGiao(dh)
    End Function

    Public Function GetData(ByVal dieukien As String)
        Return dhDA.GetData(dieukien)
    End Function

    Public Function GetID()
        Return dhDA.GetID()
    End Function

    Public Function GetInserted()
        Return dhDA.GetInserted()
    End Function
End Class
